home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1995 October / EnigmA AMIGA RUN 01 (1995)(G.R. Edizioni)(IT)[!][issue 1995-10][Aminet 7].iso / Aminet / util / dtype / fpHSN_dt40_1.lha / HSN_DT / Source / RomTag.asm < prev   
Assembly Source File  |  1995-01-28  |  2KB  |  114 lines
  1. ******************************************************************************
  2. *
  3. * HSN Datatype, based on the sourcecode found in OS3.1 Native Developer Kit
  4. *
  5. * Written by Christian Buchner
  6. *
  7. ******************************************************************************
  8. * classinit.asm
  9.  
  10.  
  11. VERSION        EQU    40
  12. REVISION    EQU    1
  13. LIBNAME        MACRO
  14.         dc.b    'hsn.datatype',0
  15.         ENDM
  16. VSTRING        MACRO
  17.         dc.b    'hsn 40.1 (28.1.95) by Christian Buchner',13,10,0
  18.         ENDM
  19.  
  20. ;---------------------------------------------------------------------------
  21.  
  22.     INCLUDE "exec/types.i"
  23.     INCLUDE "exec/libraries.i"
  24.     INCLUDE "exec/lists.i"
  25.     INCLUDE "exec/alerts.i"
  26.     INCLUDE "exec/initializers.i"
  27.     INCLUDE "exec/resident.i"
  28.     INCLUDE "libraries/dos.i"
  29.  
  30.     INCLUDE "classbase.i"
  31.  
  32. ;---------------------------------------------------------------------------
  33.  
  34.     XREF    _LibInit
  35.     XREF    _LibOpen
  36.     XREF    _LibClose
  37.     XREF    _LibExpunge
  38.     XREF    _LibReserved
  39.  
  40.     XREF    _ObtainClassEngine
  41.  
  42. ;    XREF    ENDCODE
  43.  
  44. ;---------------------------------------------------------------------------
  45.  
  46.  
  47. ;---------------------------------------------------------------------------
  48.  
  49. ; First executable location, must return an error to the caller
  50.  
  51.     SECTION    Code
  52.  
  53. Start:
  54.     moveq   #-1,d0
  55.     rts
  56.  
  57. ;-----------------------------------------------------------------------
  58.  
  59. ROMTAG:
  60.     DC.W    RTC_MATCHWORD    ; UWORD RT_MATCHWORD
  61.     DC.L    ROMTAG        ; APTR  RT_MATCHTAG
  62.     DC.L    ENDCODE        ; APTR  RT_ENDSKIP
  63.     DC.B    RTF_AUTOINIT    ; UBYTE RT_FLAGS
  64.     DC.B    VERSION        ; UBYTE RT_VERSION
  65.     DC.B    NT_LIBRARY    ; UBYTE RT_TYPE
  66.     DC.B    0        ; BYTE  RT_PRI
  67.     DC.L    LibName        ; APTR  RT_NAME
  68.     DC.L    LibId        ; APTR  RT_IDSTRING
  69.     DC.L    LibInitTable    ; APTR  RT_INIT
  70.  
  71. ENDCODE:
  72.  
  73. LibName LIBNAME
  74.     DC.B '$VER: '
  75. LibId   VSTRING
  76.  
  77.     CNOP    0,4
  78.  
  79. LibInitTable:
  80.     DC.L    ClassBase_SIZEOF
  81.     DC.L    LibFuncTable
  82.     DC.L    LibDataTable
  83.     DC.L    _LibInit
  84.  
  85. V_DEF    MACRO
  86.     DC.W    \1+(*-LibFuncTable)
  87.     ENDM
  88.  
  89. LibFuncTable:
  90.     DC.W    -1
  91.     V_DEF    _LibOpen
  92.     V_DEF    _LibClose
  93.     V_DEF    _LibExpunge
  94.     V_DEF    _LibReserved
  95.  
  96.     V_DEF    _ObtainClassEngine
  97.  
  98.     DC.W   -1
  99.  
  100. LibDataTable:
  101.     INITBYTE    LN_TYPE,NT_LIBRARY
  102.     INITLONG    LN_NAME,LibName
  103.     INITBYTE    LIB_FLAGS,(LIBF_SUMUSED!LIBF_CHANGED)
  104.     INITWORD    LIB_VERSION,VERSION
  105.     INITWORD    LIB_REVISION,REVISION
  106.     INITLONG    LIB_IDSTRING,LibId
  107.     DC.W        0
  108.  
  109.     CNOP    0,4
  110.  
  111. ;-----------------------------------------------------------------------
  112.  
  113.     END
  114.